program project1;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Interfaces, // this includes the LCL widgetset
  sysutils, Forms, fprodutorcadastro, ftecnicocadastro,
  flaboratoriocadastro, zcomponent, lazreport, lazreportpdfexport, dmprincipal,
  fprincipal, ucondicoesconsulta,
  fprodutorbusca, dmcadastro, dmlaboratorio, dmanalise, dmrelatorio,
fmunicipiobusca, fanalisebusca, dmtratamentoerro, fanaliselancamento,
ucalculosclassificacao, fmunicipiocadastro, fusuariocadastro,
fusuariotroca,
fusuarioalterarsenha, dmusuario, fusuariobusca,
fusuarioopcoes, fusuariologin;


{$R *.res}

begin
  Application.Title:='SCATS';
  Application.Initialize;
  DecimalSeparator:=',';
  ThousandSeparator:='.';
  DateSeparator:='/';
  ShortDateFormat := 'dd/mm/yyyy';
  Application.CreateForm(TDataPrincipal, DataPrincipal);
  Application.CreateForm(TDataTratamentoErro, DataTratamentoErro);
  Application.CreateForm(TDataLaboratorio, DataLaboratorio);
  Application.CreateForm(TDataRelatorio, DataRelatorio);
  Application.CreateForm(TDataCadastro, DataCadastro);
  Application.CreateForm(TDataAnalise, DataAnalise);
  Application.CreateForm(TDataUsuario, DataUsuario);
  Application.CreateForm(TFormUsuarioLogin, FormUsuarioLogin);
  Application.CreateForm(TFormPrincipal, FormPrincipal);
  Application.CreateForm(TFormProdutorCadastro, FormProdutorCadastro);
  Application.CreateForm(TFormTecnicoCadastro, FormTecnicoCadastro);
  Application.CreateForm(TFormLaboratorioCadastro, FormLaboratorioCadastro);
  Application.CreateForm(TFormProdutorBusca, FormProdutorBusca);
  Application.CreateForm(TFormMunicipioBusca, FormMunicipioBusca);
  Application.CreateForm(TFormAnaliseBusca, FormAnaliseBusca);
  Application.CreateForm(TFormAnaliseLancamento, FormAnaliseLancamento);
  Application.CreateForm(TFormMunicipioCadastro, FormMunicipioCadastro);
  Application.CreateForm(TFormUsuarioTrocar, FormUsuarioTrocar);
  Application.CreateForm(TFormUsuarioAlterarSenha, FormUsuarioAlterarSenha);
  Application.CreateForm(TFormUsuarioBusca, FormUsuarioBusca);
  Application.CreateForm(TFormUsuarioOpcoes, FormUsuarioOpcoes);
  Application.CreateForm(TFormUsuarioCadastro, FormUsuarioCadastro);
  Application.Run;
end.

